object frm_RegCode: Tfrm_RegCode Left = 285 Top = 134 ActiveControl = txt_RegName BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsDialog Caption = 'Registration' ClientHeight = 160 ClientWidth = 377 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Position = poScreenCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 9 Width = 361 Height = 28 Alignment = taCenter AutoSize = False Caption = 'Enter Your Registration Name and Code EXACTLY as it appears on y' + 'our Registration Acknowledgement:' FocusControl = txt_RegName Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False WordWrap = True end object txt_RegName: TEdit Left = 8 Top = 43 Width = 361 Height = 30 AutoSize = False Font.Color = clBlack Font.Height = -21 Font.Name = 'Courier New' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 0 OnChange = txt_RegNameChange end object cmd_OK: TBitBtn Left = 295 Top = 123 Width = 74 Height = 29 Enabled = False TabOrder = 4 Kind = bkOK Style = bsNew end object cmd_Cancel: TBitBtn Left = 216 Top = 123 Width = 74 Height = 29 TabOrder = 3 Kind = bkCancel Style = bsNew end object cmd_Help: TBitBtn Left = 8 Top = 123 Width = 74 Height = 29 Caption = 'Help' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = cmd_HelpClick Kind = bkHelp Style = bsNew IsControl = True end object txt_RegCode: TEdit Left = 8 Top = 83 Width = 361 Height = 30 AutoSize = False CharCase = ecUpperCase Font.Color = clBlack Font.Height = -21 Font.Name = 'Courier New' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 1 OnChange = txt_RegNameChange end end